﻿Imports DAO
Public Class LopHocBus

    Public Shared Function LayDanhSach(ByVal monhoc As Integer, ByVal hocky As Integer) As DataTable
        Return LopHocDao.DSTongKetMon(monhoc, hocky)
    End Function
    Public Shared Function LayDSTongKetHK(ByVal hocky As Integer) As DataTable
        Return LopHocDao.DSTongKetHK(hocky)
    End Function
    Public Function LayDSLop() As IList
        Dim lhDao As New LopHocDao()
        Dim ds As IList
        ds = lhDao.LayDSLopHoc()
        Return ds
    End Function
    Public Shared Function LayQuyDinh() As DataTable
        Return LopHocDao.QuyDinh()
    End Function
    Public Shared Function ThayDoiQuyDinh(ByVal tuoitoithieu As Integer, ByVal tuoitoida As Integer, ByVal sisotoida As Integer, ByVal solop10 As Integer, ByVal solop11 As Integer, ByVal solop12 As Integer, ByVal sohktoida As Integer, ByVal somontoida As Integer, ByVal diemdat As Integer) As DataTable
        Return LopHocDao.ThayDoiQuyDinh(tuoitoithieu, tuoitoida, sisotoida, solop10, solop11, solop12, sohktoida, somontoida, diemdat)
    End Function
End Class
